home *** CD-ROM | disk | FTP | other *** search
/ Hidden Truth / Hidden Truth.iso / amiga / aweb_pal256 < prev    next >
Text File  |  1997-03-06  |  1KB  |  37 lines

  1. c:requestchoice >env:rcp256 "Welcome To The Hidden Truth" "Screenmode: *nPAL Hi-Res Laced *n 640x512 *n  256 Colours *n *nSelect from below whether you would like to *nopen your screen in colour or greyscale" " Colour | Greyscale | Cancel "
  2.  
  3. if $rcp256 eq 1
  4.  
  5.   failat 100
  6.   stack >NIL: 20000
  7.   assign >NIL: devs: Truth:amiga/devs
  8.   assign >NIL: LIBS: Truth:AMIGA/Classes ADD
  9.   assign >NIL: sys: Truth:AMIGA ADD
  10.   assign >NIL: libs: Truth:amiga/libs add
  11.   assign >NIL: fonts: Truth:amiga/fonts add
  12.   assign >NIL: env: Truth:amiga/env-pal add
  13.   Assign >NIL: JPEGTMP: "ram:"
  14.   C:AddDataTypes >NIL: REFRESH QUIET
  15.   assign >NIL: devs: sys:devs
  16.   aweb >NIL: config aweb_pal256
  17.   
  18. endif
  19.  
  20. if $rcp256 eq 2
  21.  
  22.   failat 100
  23.   stack >NIL: 20000
  24.   assign >NIL: devs: Truth:amiga/devs
  25.   assign >NIL: LIBS: Truth:AMIGA/Classes ADD
  26.   assign >NIL: sys: Truth:AMIGA ADD
  27.   assign >NIL: libs: Truth:amiga/libs add
  28.   assign >NIL: fonts: Truth:amiga/fonts add
  29.   assign >NIL: env: Truth:amiga/env-pal add
  30.   Assign >NIL: JPEGTMP: "ram:"
  31.   C:AddDataTypes >NIL: REFRESH QUIET
  32.   assign >NIL: devs: sys:devs
  33.   aweb >NIL: config aweb_pal256g
  34.  
  35. else
  36.   endcli
  37. endif